home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 7
/
Aminet 7 - August 1995.iso
/
Aminet
/
comm
/
mail
/
thor201pch.lha
/
PatchTHOR20
< prev
next >
Wrap
Text File
|
1995-05-15
|
1KB
|
51 lines
;
; Bugfix patch for THOR 2.0 - uses SPatch Copyright (C) SAS Institute, Inc.
;
; Patch the THOR executable
echo "Patching THOR...."
spatch -pthor.pch `getenv THOR/THORPath`thor
copy THOR.new `getenv THOR/THORPath`THOR
delete THOR.new
; Patch the ConfigTHOR executable
echo "Patching ConfigTHOR...."
spatch -pconfigthor.pch `getenv THOR/THORPath`ConfigTHOR
copy ConfigTHOR.new `getenv THOR/THORPath`ConfigTHOR
delete ConfigTHOR.new >nil:
; Patch the bbsread.library
echo "Patching bbsread.library...."
spatch -pbbsread.library.pch `getenv THOR/THORPath`libs/bbsread.library
copy bbsread.new `getenv THOR/THORPath`libs/bbsread.library
delete bbsread.new >nil:
; Patch the utgui.library
echo "Patching utgui.library...."
spatch -putgui.library.pch `getenv THOR/THORPath`libs/utgui.library
copy utgui.new `getenv THOR/THORPath`libs/utgui.library
delete utgui.new >nil:
; Patch the THOR.guide documentation
echo "Patching THOR.guide...."
spatch -pthor.guide.pch `getenv THOR/THORPath`docs/thor.guide
copy THOR.new `getenv THOR/THORPath`docs/THOR.guide
delete THOR.new >nil:
; Patch the BBSReadRexx.guide documentation
echo "Patching BBSReadRexx.guide...."
spatch -pBBSReadRexx.guide.pch `getenv THOR/THORPath`docs/BBSReadRexx.guide
copy BBSReadRexx.new `getenv THOR/THORPath`docs/BBSReadRexx.guide
delete BBSReadRexx.new >nil:
; Copy some small stuff over.
Copy bin/#? `getenv THOR/THORPath`bin/
Copy scripts/#? `getenv THOR/THORPath`scripts/
Copy rexx/#? `getenv THOR/THORPath`rexx/
wait 2